<%
if Request.TotalBytes>1 then 
	set tStream = Server.CreateObject("adodb.stream")
	tStream.Type = 1
	tStream.Mode =3
	tStream.Open
	tStream.Write  Request.BinaryRead(Request.TotalBytes)
    tStream.SaveToFile server.MapPath("../config.xml"),2
    tStream.Close
    set tStream=nothing 
End if
%>